home *** CD-ROM | disk | FTP | other *** search
Text File | 1996-05-01 | 1.7 KB | 64 lines | [TEXT/MPS ] |
- ;
- ; File: AEPackObject.a
- ;
- ; Contains: AppleEvents object packing Interfaces.
- ;
- ; Version: Technology: System 7.5
- ; Release: Universal Interfaces 3.0d3 on Copland DR1
- ;
- ; Copyright: © 1984-1996 by Apple Computer, Inc. All rights reserved.
- ;
- ; Bugs?: If you find a problem with this file, send the file and version
- ; information (from above) and the problem description to:
- ;
- ; Internet: apple.bugs@applelink.apple.com
- ; AppleLink: APPLE.BUGS
- ;
- ;
- IF &TYPE('__AEPACKOBJECT__') = 'UNDEFINED' THEN
- __AEPACKOBJECT__ SET 1
-
- IF &TYPE('__APPLEEVENTS__') = 'UNDEFINED' THEN
- include 'AppleEvents.a'
- ENDIF
- ; These are the object packing routines.
- IF FOR_SYSTEM7_AND_SYSTEM8_PREEMPTIVE THEN
- ;
- ; pascal OSErr CreateOffsetDescriptor(long theOffset, AEDesc *theDescriptor)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION CreateOffsetDescriptor
- ENDIF
-
- ;
- ; pascal OSErr CreateCompDescriptor(DescType comparisonOperator, AEDesc *operand1, AEDesc *operand2, Boolean disposeInputs, AEDesc *theDescriptor)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION CreateCompDescriptor
- ENDIF
-
- ;
- ; pascal OSErr CreateLogicalDescriptor(AEDescList *theLogicalTerms, DescType theLogicOperator, Boolean disposeInputs, AEDesc *theDescriptor)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION CreateLogicalDescriptor
- ENDIF
-
- ;
- ; pascal OSErr CreateObjSpecifier(DescType desiredClass, AEDesc *theContainer, DescType keyForm, AEDesc *keyData, Boolean disposeInputs, AEDesc *objSpecifier)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION CreateObjSpecifier
- ENDIF
-
- ;
- ; pascal OSErr CreateRangeDescriptor(AEDesc *rangeStart, AEDesc *rangeStop, Boolean disposeInputs, AEDesc *theDescriptor)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION CreateRangeDescriptor
- ENDIF
-
- ENDIF
- ENDIF ; __AEPACKOBJECT__
-
-